home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Visual Basic Toolbox
/
Visual Basic Toolbox (P.I.E.)(1996).ISO
/
sound
/
fbifile
/
intellig.frm
(
.txt
)
< prev
next >
Wrap
Visual Basic Form
|
1993-01-17
|
2KB
|
72 lines
Intelligence
Please Wait
Form1%
Command1
Timer2
Timer1
accesscode
Label2
Gathering Intelligence Data
Label1
Timer1_Timer
label1
Captionc
Form_Click
secondtime
label2
command1
enabledN
Timer1=
Visible
command1_click
printprofile
accesscode2
accesscode_Change
accesscode_KeyPress
KeyAscii
Text~
Form_Load
sndplaysound
intelligence
fbifile
Form_Unload
Cancel
counter
FALSE
Flashwindow
bInvert
Timer2_Timer
timer2
Form_Paint(
fbifile_printprofile
profile
BTN_View
text1
Form_GotFocus
Form_Activate,
command1_click
fbifile
accden.wav
Access Denied
Form_Activate
gather.wav
Form_Unload
Timer1_Timer
Compiling Data
Compiling Data
this plays the WAV:
compile.wav
the flags work as follows:
0 wait until sound finishes before returningd
1 return immediately - sound can be stopped withl
i% =sndplaysound(0&, 0)
2 play no default if it can't find the WAVd
4 play sound over and over, must be combined with 1 by calling the flag
i% =sndplaysound(snd_async or snd_loop, 0) it can also be stopped with '(0%,0)f
5 returns false immediately if sound is already playing.
Profile Complete
Enter Security Access Code
this plays the WAV:=
access.wav
Timer2_Timer